Developer CD Series 1999 June: Reference Library/Dev.CD Jun 99 RL Disk 1.toast/Technical Documentation/Macintosh Technotes and Q&As/technotes/tn/MPWScripts/DumpSharedLibraries

Text File | 1997-12-10 | 503 b | 11 lines | [TEXT/R*ch]

If "`Exists -d "{SharedLibraries}"`"
    For i in `files -f -t 'shlb' "{SharedLibraries}"`;
        DumpPEF -ldr n -stripped "{i}" | streamedit -e "1 delete; /(Å)¨1/  replace /[ ]*(Å)¨1/ ¨1'¶t{i}'" >> "{MPW}"SharedLibraries.index
    End;

    For i in `files -f -t 'stub' "{SharedLibraries}"`;
        DumpPEF -ldr n -stripped "{i}" | streamedit -e "1 delete; /(Å)¨1/  replace /[ ]*(Å)¨1/ ¨1'¶t{i}'" >> "{MPW}"SharedLibraries.index
    End;
    sort -l -unique "{MPW}"SharedLibraries.index -o "{MPW}"SharedLibraries.index
End;